home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Scope
/
Scope Disk #058 (199x)(Scope PD)(US)[WB].zip
/
Scope Disk #058 (199x)(Scope PD)(US)[WB].adf
/
B1Subs
/
graphics.bmap.sub
< prev
next >
Wrap
Text File
|
1989-01-24
|
757b
|
20 lines
'*** Conversion of graphics.bmap ***
OPEN "RAM:graphics.bmap" for output as 1
FOR X=1 TO 1643
READ X$: A=VAL("&HO"+X$)
PRINT #1,CHR$(A);
NEXT X
CLOSE #1
,42,6C,74,42,69,74,4D,61,70
data 0,FF,E2,9,1,2,A,3,4,5,6,7,8,B,0,42,6C,74,54,65
data 6D,70,6C,61,74,65,0,FF,DC,9,1,2,A,3,4,5,6,0,43,6C
data 65,61,72,45,4F,4C,0,FF,D6,A,0,43,6C,65,61,72,53,63,72,65
data 65,6E,0,FF,D0,A,0,54,65,78,74,4C,65,6E,67,74,68,0,FF,CA
data A,9,1,0,54,65,78,74,0,FF,C4,A,9,1,0,53,65,74,46,6F
data 6E,74,0,FF,BE,A,9,0,4F,70,65,6E,46,6F,6E,74,0,FF,B8,9
data 0,43,6C,6F,73,65,46,6F,6E,74,0,FF,B2,A,0,41,73,6B,53,6F
data 66,74,53,74,79,6C,65,0,FF,AC,A,0,53,65,74,53,6F,66,74,53
data 74,79,6C,65,0,FF,A6,A,1,2,0,41,64,64,42,6F,62,0,FF,A0
data 9,A,0